inherited FCadEtapaMaterial: TFCadEtapaMaterial
  Left = 1016
  Top = 205
  Width = 758
  Caption = 'Cadastro de Materiais por etapa'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object lbl3: TLabel [4]
    Left = 24
    Top = 80
    Width = 72
    Height = 13
    Caption = 'EMPREENDID'
    FocusControl = dbedt3
  end
  object lbl4: TLabel [5]
    Left = 24
    Top = 40
    Width = 32
    Height = 13
    Caption = 'ETPID'
    FocusControl = dbedt4
  end
  object lbl1: TLabel [6]
    Left = 24
    Top = 168
    Width = 157
    Height = 13
    Caption = 'ETPEMPMATVALORPREVISTO'
    FocusControl = dbedt1
  end
  object lbl2: TLabel [7]
    Left = 24
    Top = 120
    Width = 65
    Height = 13
    Caption = 'IDMATERIAL'
    FocusControl = dbedt2
  end
  inherited BtCancelar: TBitBtn
    Left = 659
  end
  inherited BtGravar: TBitBtn
    Left = 578
  end
  object dbedt3: TDBEdit [11]
    Left = 24
    Top = 96
    Width = 81
    Height = 21
    DataField = 'EMPREENDID'
    DataSource = ds1
    TabOrder = 3
  end
  object dbedt4: TDBEdit [12]
    Left = 24
    Top = 56
    Width = 81
    Height = 21
    DataField = 'ETPID'
    DataSource = ds1
    TabOrder = 4
  end
  object dbedt1: TDBEdit [13]
    Left = 24
    Top = 184
    Width = 134
    Height = 21
    DataField = 'ETPEMPMATVALORPREVISTO'
    DataSource = ds1
    TabOrder = 5
  end
  object EdDescMaterial: TEdit [14]
    Left = 108
    Top = 136
    Width = 621
    Height = 21
    TabOrder = 6
  end
  object dbedt2: TDBEdit [15]
    Left = 24
    Top = 136
    Width = 81
    Height = 21
    DataField = 'IDMATERIAL'
    DataSource = ds1
    TabOrder = 7
    OnExit = dbedt2Exit
  end
  inherited qFilha: TQuery
    AfterScroll = qFilhaAfterScroll
    SQL.Strings = (
      'SELECT EMAT.*'
      'FROM ETAPAEMPREENDIMENTOMATERIAIS EMAT'
      'WHERE 1 = -1')
    Left = 330
    Top = 12
    object qFilhaEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTOMATERIAIS.EMPREENDID'
    end
    object qFilhaETPID: TIntegerField
      FieldName = 'ETPID'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTOMATERIAIS.ETPID'
    end
    object qFilhaETPEMPMATVALORPREVISTO: TFloatField
      FieldName = 'ETPEMPMATVALORPREVISTO'
      Origin = 
        '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTOMATERIAIS.ETPEMPMATVALORPREVI' +
        'STO'
      currency = True
    end
    object qFilhaIDMATERIAL: TIntegerField
      FieldName = 'IDMATERIAL'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTOMATERIAIS.IDMATERIAL'
    end
  end
  inherited qGenerica: TQuery
    Left = 364
    Top = 43
  end
  inherited dsfilha: TDataSource
    Left = 368
    Top = 8
  end
  object ds1: TDataSource
    DataSet = qFilha
    Left = 328
    Top = 48
  end
end
